|
AutoCAD VBA : Block im aktivem Layout suchen
alfred neswadba am 28.04.2009 um 22:24 Uhr (0)
Hi Georg,bitte nicht Blockdefinition (Block) mit Blockreferenz (BlockReference) vertauschen, Du findest im Layout keine Blockdefinitionen, nur -referenzen.Codebeispiel (durchsucht aktuelles Layout und listet alle Blockreferenz-Namen) wäre:Code:Public Sub ScanLayout() Dim tAcadEnt As AcadEntity For Each tAcadEnt In ThisDrawing.ActiveLayout.Block If TypeOf tAcadEnt Is AcadBlockReference Then Debug.Print tAcadEnt.Name End If NextEnd Sub- alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Preview
alfred neswadba am 23.01.2009 um 10:37 Uhr (0)
Hi,zuerst mal Rückfrage, Plotten aus Modellbereich oder aus Layout.Eine zweite Rückfrage: wo hast Du in Deinem Makro die Infos über welcher Drucker, welches Seitenformat, bei Bedarf welche CTB/STB?Wenn das im Layout nicht schon voreingestellt ist, dann musst Du Dir die Informationen erst zusammensammeln, dann zuweisen.- alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Attribute auslesen von aktuellem Blatt
alfred neswadba am 01.03.2010 um 14:55 Uhr (0)
Hi Torsten,wenn Du mit Blatt ein AutoCAD-Layout meinst, dann folgt gleich die nächste Frage:Meinst Du die Blöcke, die in Ansichtsfenstern auf diesem Layout sichtbar sind?Beides möglich, nur ohne genaue Angaben bzw. Einsicht in Dein Tool (wie Dus jetzt machst und wo Du daher mit Modifikationen beginnen musst) ist keine definitive Antwort möglich, leider.- alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Attribute auslesen von aktuellem Blatt
alfred neswadba am 01.03.2010 um 15:29 Uhr (0)
Hi, Blockdefinitione und deren AnzahlAuf die Gefahr hin, dass ich lästig erscheine, ich stell trotzdem noch eine Gewissensfrage (plus ergänzende Frage):Was hilft es Dir, zu wissen, dass es auf einem Layout 2 Blockarten gibt?Ergänzende Frage bzw. Hintergrund dazu: Du hast auf einem Layout eine Blockreferenz SCHRIFTKOPF und 5 Blockreferenzen ANDERUNGSLISTENEINTRAG (sind die Änderungen 1-5, für die je eine Blockreferenz eingesetzt werden).Interpretiere ich Deinen Wunsch wortwörtlich, bekommst Du als Ergebnis ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Attribute auslesen von aktuellem Blatt
alfred neswadba am 01.03.2010 um 15:10 Uhr (0)
Hi,und möchtest Du nur die Blockreferenzen ausgeben, die am Papier liegen oder die, die im jeweiligen Ansichtsfenster (im Zoom-Ausschnitt des Ansichtsfensters) zu sehen sind.Dazu noch eine ergänzende Frage: gibt es mehrere Ansichtsfenster in einem Layout?Und lt. Deinem Code die scwerwiegendste Frage: meinst Du Blockdefinitionen oder Blockreferenzen? In Deinem Code wertest Du aus, wie viele Blockdefinitionen es in Deiner Zeichnung gibt (nicht, wie oft diese in der Zeichnung, sei es Modellbereich oder Layout ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Mittels VBA den Layoutnamen ändern ?
alfred neswadba am 12.03.2010 um 15:49 Uhr (0)
Hi,vermeide GoTo-Anweisungen, wenn Du Dich später mal mit anderen Programmiersprachen auseinandersetzten willst. Und dann gäbe es noch das On Error ...., das ich wie folgt verwendet hätte:Code:Private Sub cmdOK_Click() Dim Layout As AcadLayout Set Layout = ThisDrawing.ActiveLayout If TextBox9.Text = "Model" Then MsgBox "Sie befinden sich im Modellbereich", vbInformation, "Zur Info" ThisDrawing.SelectionSets.Item("DB15").Delete Else dann koennen wir weiter fortsetzen If TextBox9.Text = "" Then ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Text (Beschriftung) in Layout ausrichten
alfred neswadba am 29.10.2009 um 23:10 Uhr (0)
Na damit Du halt beruhigt schlafen kannst: wird das Attribut dann um den Blockeinfügepunkt gedreht?JA- alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Mit vb.net bestimmtes Layout aktiv setzen
alfred neswadba am 20.07.2011 um 15:28 Uhr (0)
Hi,Variable CTAB oder .ActiveLayout setzen sollte funken (siehe z.B. hier).HTH, - alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Anzahl von Layout / 2 von 25
alfred neswadba am 07.01.2011 um 16:37 Uhr (0)
Hi,die Schleife rechnest Du aber umsonst, denn in dieser wird nichts gemacht, also könntest Du doch ThisDrawing.Layouts.Count direkt verwenden, oder?- alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Text (Beschriftung) in Layout ausrichten
alfred neswadba am 29.10.2009 um 22:59 Uhr (0)
Hi,brauchst kein Civil, das Erstellen einer Blockdefinition und das Einstellen der Option Beschriftung ist alles pures AutoCAD.- alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Plotten aus VBA
alfred neswadba am 23.12.2010 um 09:46 Uhr (0)
Hi,die Eigenschaft wird auch schreibgeschützt bleiben, da ja durch Erstellung einer PlotConfig eben noch nicht bekannt ist, ob Modell oder Layout.Wieso gehst Du nicht den Weg mit Fenster? Welchen Grund gibt es, unbedingt auf .acLimits zu bestehen?- alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AutoCAD plotten
alfred neswadba am 23.03.2009 um 14:41 Uhr (0)
Hi,Du hast in der VBA-Hilfe ein Beispiel für GetCanonicalMediaNames, und wenn du das richtige in der Liste gefunden hast, kannst Du das dem Layout zuweisen.Siehe z.B. hier (3.ter Beitrag), ist ein kleines Beispiel von Auflisten und Zuweisen.- alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Anzahl von Layout / 2 von 25
alfred neswadba am 07.01.2011 um 15:20 Uhr (0)
Hi,hier mit TabOrder (in richtiger Sprache )Code:Dim tLayout As AcadLayoutFor Each tLayout In ThisDrawing.Layouts Debug.Print ("Name: " & tLayout.Name & " TabOrder: " & tLayout.TabOrder)Next- alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
